home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Game / C / CORE! 1.1.CPT / Core! 1.1 / Battle Programs / Jon's Fighters / blanket next >
Encoding:
Text File  |  1989-07-18  |  541 b   |  26 lines  |  [TEXT/MARS]
  1. ;
  2. ; experimental vampire program
  3. ; written by Jon Newman
  4. ;
  5. fang      jmp 16,0
  6. bomb      dat 0,-22
  7. trap      mov #3000, ttarg
  8.           mov #-16, purge
  9. tloop     mov bomb, <ttarg
  10.           spl @purge,0
  11.           jmp @purge,0
  12. start     mov fang, @target
  13.           sub #16, target
  14.           jmn start, target
  15.           mov #7968, target
  16.           jmp start,0
  17. blank1    dat 0,0
  18. blank2    dat 0,0
  19. blank3    dat 0,0
  20. blank4    dat 0,0
  21. blank5    dat 0,0
  22. blank6    dat 0,0
  23. target    dat 0,7968
  24. ttarg     dat 0,3000
  25. purge     dat 0,-16
  26. end       start